www.gusucode.com > 云网互动影视系统(12套模版和资源联盟) 6.2 > 云网互动影视系统(12套模版和资源联盟) 6.2.4/免费版/Users/Users_Password.asp
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>修改密码</title>
<link href="style/nav.css" rel="stylesheet" type="text/css" />
</head>
<body>
<!--#include file="../conn.asp"-->
<!--#include file="../Function/Function.asp"-->
<!--#include file="../function/MD5.asp" -->
<!--#include File = "../API/API_Config.asp"-->
<!--#include File = "../API/API_Function.asp"-->
<script language="javascript" src="js/passwordstrength.js"></script>
<table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="100%" valign="top"><table width="690" border="0" align="center" cellpadding="0" cellspacing="0">
<tr>
<td height="43" background="images/user_top.gif"><table width="100%" border="0" cellpadding="0" cellspacing="0">
<tr>
<td width="6%"> </td>
<td width="94%">修改密码</td>
</tr>
</table></td>
</tr>
</table><br />
<table width="90%" border="0" align="center" cellpadding="5" cellspacing="0">
<tr>
<td bgcolor="#f7f7f7"><table width="100%" border="0" align="center" cellpadding="0" cellspacing="0" class="login">
<tr>
<td><br>
<%Sub EditPassword()
If API_Enable Then
FoundErr = False
ErrMsg = ""
sPE_Items(conAction, 1) = "update"
sPE_Items(conUsername, 1) = NoSqlHack(request.Form("userid"))
sPE_Items(conPassword, 1) = NoSqlHack(Request.Form("password"))
If createXmlDom Then
prepareXML True
SendPost
If FoundErr Then
ErrMsg = "<li>" & ErrMsg & "</li>"
End If
Else
FoundErr = True
ErrMsg = "<li>目前注册服务不可用! [APIError-XmlDom-Runtime]</li>"
End If
End If
Set Rs=Server.CreateObject(YWNT_TMS_RS)
sql="select UsersPassword from YWNT_TMS_Users where UsersName='"&Request.Cookies("YWNTUserCookie")("UserName")&"'"
Rs.open sql,Conn,1,3
RS("UsersPassword")=md5(NoSqlHack(Request.Form("password")),16)
Rs.Update
Rs.Close
Set Rs = Nothing
call ShowErr("<li>用户密码修改成功</li>","Users_Password.asp",1)
End Sub
Action=Trim(request("Action"))
Select Case Action
Case "EditPassword"
call EditPassword()
Case else
IF Request.Cookies("YWNTUserCookie")("UserName")="" Then
call UsersLogin()
Else
call Password()
End If
End Select
sub Password()%>
<script language="javascript" src="js/js.js"></script>
<table width="60%" align="center" cellpadding="0" cellspacing="0">
<form name="form" id="Reg" action="Users_Password.asp?Action=EditPassword" method="post" onSubmit="return Validator.Validate(this,3)">
<tr>
<td width="20%" height="27">用户名称：</td>
<td><input id="userid" readonly="readOnly" maxlength="20" value="<%=Request.Cookies("YWNTUserCookie")("UserName")%>" name="userid" /></td>
</tr>
<tr>
<td height="27">用户密码：</td>
<td><input name="Password" type="password" onfocus="opencat('PasswordJc');" onblur="opencat('PasswordJc');" onKeyUp="ps.update(this.value);" value="" size="30" dataType="Limit" min="6" msg="密码不能少于6个字"/></td>
</tr>
<tr id="PasswordJc" style="display: none;">
<td height="32">密码强度：</td>
<td colspan="2"><script language="javascript">
var ps = new PasswordStrength();
ps.setSize("200","20");
ps.setMinLength(5);
</script>
</td>
</tr>
<tr>
<td height="27">确认密码：</td>
<td><input id="password2" type="password" size="30" value="" name="password2" dataType="Repeat" to="Password" msg="两次输入的密码不一致"/></td>
</tr>
<tr>
<td height="27"> </td>
<td><input type="image" name="imageField" src="images/qd_06.gif" /></td>
</tr>
</form>
</table>
<SCRIPT language=JavaScript type=text/JavaScript>
function opencat(cat)
{
if(document.getElementById(cat).style.display=="none")
{
document.getElementById(cat).style.display="";
}
else
{
document.getElementById(cat).style.display="none";
}
}
</SCRIPT>
<%end sub%>
<br></td>
</tr>
</table></td>
</tr>
</table></td>
</tr>
</table>
<%call connclose()%>
</body>
</html>